Avoid mixing standard error output messages into the search result.

diff --git a/lisp/net/ldap.el b/lisp/net/ldap.el
index 55af47e6a8748a2a4ce2ed052eb46ba17c69de4b..f093fb1cbcc439c4a34425a5128d0b816b6ceefa 100644 (file)
--- a/lisp/net/ldap.el
+++ b/lisp/net/ldap.el
@@ -554,7 +554,7 @@ an alist of attribute/value pairs."
          (setq arglist (nconc arglist (list (format "-z%s" sizelimit)))))
       (eval `(call-process ldap-ldapsearch-prog
                           nil
-                          buf
+                          `(,buf nil)
                           nil
                           ,@arglist
                           ,@ldap-ldapsearch-args